5 Z$="A L L E   POKES FUER DEN C 64, VON H. BUETZER UND P. KITTEL"
6 Z$=Z$+"                "+CHR$(13)
50 OPEN1,4:ZZ=99:SZ=0
70 FORI=0TO65535:FORJ=0TO255
80 A$="POKE"+MID$(STR$(I),2)+","+MID$(STR$(J),2)
81 IFLEN(A$)+LEN(Z$)<79THENZ$=Z$+":"+A$:GOTO85
83 ZZ=ZZ+1:IFZZ>60THENZZ=0:SZ=SZ+1:PRINT#1,CHR$(12);"SEITE";SZ:PRINT#1
84 PRINT#1,Z$:Z$=A$
85 NEXT:NEXT:PRINT#1,Z$
90 CLOSE1:END